home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Game / C / CORE! 1.1.CPT / Core! 1.1 / Battle Programs / contest87 / PARASITE6 < prev    next >
Encoding:
Text File  |  1989-07-19  |  504 b   |  29 lines  |  [TEXT/MARS]
  1. ;PARASITE6     /JAPAN ENTRY
  2. DPTR1    DAT    1024*4
  3. START    JMN    ATT1,@DPTR1
  4.     ADD    #8,DPTR1
  5. C1    JMN    ATT2,@DPTR2
  6.     SUB    #8,DPTR2
  7. C2    JMN    START,DPTR2
  8. START2    MOV    #1024*4+13,DPTR1
  9.     MOV    #1024*4-14,DPTR2
  10. LOOP    MOV    JOBOMB,@DPTR1
  11.     ADD    #2,DPTR1
  12.     MOV    JOBOMB,<DPTR2
  13.     DJN    LOOP,DPTR2
  14.     MOV    DPTR2,JOBOMB
  15.     JMP    START2
  16. ATT1    MOV    #16,COUNT
  17. LOOP1    MOV    SOBOMB,<DPTR1
  18.     DJN    LOOP1,COUNT
  19.     ADD    #32,DPTR1
  20.     JMP    C1
  21. ATT2    MOV    #15,COUNT
  22. LOOP2    MOV    SOBOMB,<DPTR2
  23.     DJN    LOOP2,COUNT
  24.     SUB    #1,DPTR2
  25. COUNT    JMP    C2
  26. JOBOMB    JMP    0
  27. SOBOMB    SPL    0
  28. DPTR2    DAT    1024*4
  29. END    START